home *** CD-ROM | disk | FTP | other *** search
/ The 640 MEG Shareware Studio 2 / The 640 Meg Shareware Studio CD-ROM Volume II (Data Express)(1993).ISO / clang / fgl105c.zip / 13-01.C < prev    next >
Text File  |  1991-05-06  |  510b  |  28 lines
  1. main()
  2. {
  3.    int freq;
  4.  
  5.    printf("20 Hz tone...\n");
  6.    fg_sound(20,3);
  7.    fg_waitfor(18);
  8.  
  9.    printf("100 Hz tone...\n");
  10.    fg_sound(100,3);
  11.    fg_waitfor(18);
  12.  
  13.    printf("1000 Hz tone...\n");
  14.    fg_sound(1000,3);
  15.    fg_waitfor(18);
  16.  
  17.    printf("warble...\n");
  18.    fg_sound(400,1);
  19.    fg_sound(410,1);
  20.    fg_sound(400,1);
  21.    fg_sound(410,1);
  22.    fg_waitfor(18);
  23.  
  24.    printf("sliding tone from 100 to 500 Hz...\n");
  25.    for (freq = 100; freq <= 500; freq+=10)
  26.       fg_sound(freq,2);
  27. }
  28.